home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 2003 September / PC Answers September 2003.iso / Software / freeware / pixeltoolbox / Setup.exe / Main / PixelToolbox.exe / PixelToolbox.dxr / Scripts_86_mouse script - center fx.ls < prev    next >
Encoding:
Text File  |  2002-06-08  |  1.8 KB  |  81 lines
  1. property pMySprite, pMyMember, pMyMember2
  2. global gSize, gCast, gHSL, gBC
  3.  
  4. on beginSprite me
  5.   pMySprite = sprite(me.spriteNum)
  6.   pMyMember = pMySprite.memberNum
  7.   pMyMember2 = pMyMember - 1
  8. end
  9.  
  10. on mouseEnter me
  11.   if pMySprite = sprite(292) then
  12.     if gHSL <> VOID then
  13.       put "Click to reset sliders to 0." into field "status"
  14.     end if
  15.   else
  16.     if pMySprite = sprite(293) then
  17.       if gBC <> VOID then
  18.         put "Click to reset sliders to 0." into field "status"
  19.       end if
  20.     end if
  21.   end if
  22. end
  23.  
  24. on mouseLeave me
  25.   if pMySprite = sprite(292) then
  26.     if gHSL <> VOID then
  27.       put EMPTY into field "status"
  28.     end if
  29.   else
  30.     if pMySprite = sprite(293) then
  31.       if gBC <> VOID then
  32.         put EMPTY into field "status"
  33.       end if
  34.     end if
  35.   end if
  36. end
  37.  
  38. on mouseDown me
  39.   if pMySprite = sprite(292) then
  40.     if gHSL <> VOID then
  41.       repeat while the mouseDown
  42.         set the memberNum of sprite pMySprite to pMyMember2
  43.         updateStage()
  44.       end repeat
  45.     else
  46.       beep()
  47.     end if
  48.   else
  49.     if pMySprite = sprite(293) then
  50.       if gBC <> VOID then
  51.         repeat while the mouseDown
  52.           set the memberNum of sprite pMySprite to pMyMember2
  53.           updateStage()
  54.         end repeat
  55.       else
  56.         beep()
  57.       end if
  58.     end if
  59.   end if
  60. end
  61.  
  62. on mouseUp me
  63.   if pMySprite = sprite(292) then
  64.     if gHSL <> VOID then
  65.       set the memberNum of sprite pMySprite to pMyMember
  66.       member("adj hsl - " & gSize, gCast).image = gHSL
  67.       sendSprite(189, #resetHSLSlider)
  68.       updateStage()
  69.     end if
  70.   else
  71.     if pMySprite = sprite(293) then
  72.       if gBC <> VOID then
  73.         set the memberNum of sprite pMySprite to pMyMember
  74.         member("adj tone - " & gSize, gCast).image = gBC
  75.         sendSprite(195, #resetBCSlider)
  76.         updateStage()
  77.       end if
  78.     end if
  79.   end if
  80. end
  81.